From 094136858f8d6461d80fc94319638b16bc194373 Mon Sep 17 00:00:00 2001 From: justbur Date: Fri, 29 Jan 2016 21:08:12 -0500 Subject: [PATCH] Don't listify key sequence repeatedly This function is not idempotent it turns out. --- which-key.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/which-key.el b/which-key.el index 37370764f4a..738275dc421 100644 --- a/which-key.el +++ b/which-key.el @@ -1701,7 +1701,9 @@ enough space based on your settings and frame size." prefix-keys) (defun which-key--reload-key-sequence (key-seq) (let ((next-event (mapcar (lambda (ev) (cons t ev)) - (listify-key-sequence key-seq)))) + (if (listp key-seq) + key-seq + (listify-key-sequence key-seq))))) (setq prefix-arg current-prefix-arg unread-command-events next-event))) -- 2.30.2